Immoral Angel 1/Immoral Angel 1.iso/pc/program/play.dxr/00068_nextPrev,up.ls

Text File | 1997-07-11 | 444 b | 20 lines

on mouseDown
  global selectedvideonum
  eracemenudownbutton()
  set which to npbutton()
  if item 1 of which = 1 then
    if selectedvideonum contains "QT" then
      set gomarker to char 3 to 4 of item 1 of selectedvideonum
    else
      set gomarker to selectedvideonum
    end if
    if item 2 of which = 1 then
      go("-" & gomarker)
    else
      if item 2 of which = -1 then
        go(gomarker)
      end if
    end if
  end if
end